(ielm-eval-input): More of previous change.

diff --git a/lisp/ielm.el b/lisp/ielm.el
index 9983c01a0f56183d6d989359a0fc20e6fe8cbc0f..7c2dc4d6409bc681f379465ee206f1e7e068881e 100644 (file)
--- a/lisp/ielm.el
+++ b/lisp/ielm.el
@@ -348,9 +348,9 @@ simply inserts a newline."
                (setq ielm-output (concat ielm-output "*** " ielm-error-type " ***  "))
                (setq ielm-output (concat ielm-output ielm-result)))
            ;; There was no error, so shift the ::: values
-           (setq ::: ::)
-           (setq :: :)
-           (setq : ielm-result))
+           (setq *** **)
+           (setq ** *)
+           (setq * ielm-result))
          (setq ielm-output (concat ielm-output "\n"))))
     (setq ielm-output (concat ielm-output ielm-prompt))
     (comint-output-filter (ielm-process) ielm-output)))